home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / systems / atari / birkhahn-metafont-packed-disks / mf27-2_2e-disk2.zoo / inputs / wasy.lzs / WASYFONT.TEX < prev   
Text File  |  1991-03-25  |  5KB  |  144 lines
  1. \font\tenwasy = wasy10
  2. \font\ninewasy = wasy9
  3. \font\eightwasy = wasy8
  4. \font\sevenwasy = wasy7
  5. \font\fivewasy = wasy5
  6. \newfam\wasyfam
  7. \newcount\wasyfamcount
  8. \wasyfamcount=\wasyfam \multiply\wasyfamcount by 256
  9. \def\wasy{\fam\wasyfam\tenwasy}
  10. \textfont\wasyfam=\tenwasy
  11. \scriptfont\wasyfam=\sevenwasy
  12. \scriptscriptfont\wasyfam=\fivewasy
  13. %%%%%% special macro
  14. \def\overstrike#1#2{{\setbox0\hbox{$#2$}\hbox to \wd0{\hss
  15.     $#1$\hss}\kern-\wd0\box0}}
  16. %%%%%% special symbols
  17. \def\male{\hbox{\wasy\char26}}
  18. \def\female{\hbox{\wasy\char25}}
  19. \def\currency{{\wasy\char27}}
  20. \def\phone{{\wasy\char7}}
  21. \def\recorder{{\wasy\char6}}
  22. \def\clock{{\wasy\char28}}
  23. \def\lightning{{\wasy\char18}}
  24. \def\pointer{{\wasy\char9}}
  25. \def\RIGHTarrow{{\wasy\char17}}
  26. \def\LEFTarrow{{\wasy\char16}}
  27. \def\UParrow{{\wasy\char75}}
  28. \def\DOWNarrow{{\wasy\char76}}
  29. \def\AC{\hbox{\kern0.5pt\wasy\char58\kern0.5pt}}
  30. \def\HF{\lower0.9pt\hbox to 0pt{\kern0.5pt\wasy\char58\hss}%
  31.         \raise0.9pt\hbox{\kern0.5pt\wasy\char58\kern0.5pt}}
  32. \def\VHF{\hbox{\wasy\char64}}
  33. \def\Box{\hbox{\wasy\char50}}\let\Square\Box
  34. \def\XBox{\hbox{\wasy\char52}}
  35. \def\Diamond{\hbox{\wasy\char51}}
  36. \def\hexagon{\hbox{\wasy\char55}}
  37. \def\pentagon{\hbox{\wasy\char68}}
  38. \def\octagon{\hbox{\wasy\char56}}
  39. \def\varhexagon{\hbox{\wasy\char57}}
  40. \def\hexstar{\hbox{\wasy\char65}}
  41. \def\varhexstar{\hbox{\wasy\char66}}
  42. \def\davidsstar{\hbox{\wasy\char67}}
  43. \def\diameter{\hbox{\wasy\char31}}
  44. \def\invdiameter{\hbox{\wasy\char21}}
  45. \def\varangle{\hbox{\wasy\char30}}
  46. \def\lozenge{\hbox{\wasy\char53}}
  47. \def\kreuz{\hbox{\wasy\char54}}
  48. \def\smiley{\hbox{\wasy\char1}}
  49. \def\frownie{\hbox{\wasy\char4}}
  50. \def\blacksmiley{\hbox{\wasy\char2}}
  51. \def\sun{\hbox{\wasy\char3}}
  52. \def\checked{\hbox{\wasy\char8}}
  53. \def\bell{\hbox{\wasy\char10}}
  54. \def\eighthnote{\hbox{\wasy\char11}}
  55. \def\quarternote{\hbox{\wasy\char12}}
  56. \def\halfnote{\hbox{\wasy\char13}}
  57. \def\fullnote{\hbox{\wasy\char14}}
  58. \def\twonotes{\hbox{\wasy\char15}}
  59. \def\brokenvert{\hbox{\wasy\char124}}
  60. \def\therefore{\hbox{\wasy\char5}}
  61. \def\Circle{\hbox{\wasy\char35}}
  62. \def\CIRCLE{\hbox{\wasy\char32}}
  63. \def\Leftcircle{\hbox{\wasy\char73}}
  64. \def\LEFTCIRCLE{\hbox{\wasy\char71}}
  65. \def\Rightcircle{\hbox{\wasy\char74}}
  66. \def\RIGHTCIRCLE{\hbox{\wasy\char72}}
  67. \def\LEFTcircle{\hbox to 0pt{\wasy\char71\hss}\hbox{\wasy\char35}}
  68. \def\RIGHTcircle{\hbox to 0pt{\wasy\char72\hss}\hbox{\wasy\char35}}
  69. %%%%%% astronomy
  70. \def\aries{\hbox{\wasy\char23}}
  71. \def\ascnode{\hbox{\wasy\char19}}
  72. \def\descnode{\hbox{\wasy\char20}}
  73. \def\fullmoon{\hbox{\wasy\char35}}
  74. \def\newmoon{\hbox{\wasy\char32}}
  75. \def\leftmoon{\hbox{\wasy\char36}}
  76. \def\rightmoon{\hbox{\wasy\char37}}
  77. \def\astrosun{\hbox{\tensy\char12}}
  78. \def\mercury{\hbox{\wasy\char39}}
  79. \def\venus{\raise0.2ex\hbox{\wasy\char25}}
  80. \def\earth{\lower0.3ex\hbox{\wasy\char38}}
  81. \def\mars{\lower0.2ex\hbox{\wasy\char26}}
  82. \def\jupiter{\hbox{\wasy\char40}}
  83. \def\saturn{\hbox{\wasy\char41}}
  84. \def\uranus{\hbox{\wasy\char42}}
  85. \def\neptune{\hbox{\wasy\char43}}
  86. \def\pluto{\hbox{\wasy\char48}}
  87. %%%%%% APL characters
  88. \def\APLstar{{\hbox{\wasy\char69}}}
  89. \def\APLlog{{\hbox{\wasy\char22}}}
  90. \def\APLbox{{\hbox{\wasy\char126}}}
  91. \def\APLup{{\hbox{\wasy\char0}}}
  92. \def\APLdown{{\hbox{\wasy\char70}}}
  93. \def\APLinput{{\hbox{\wasy\char125}}}
  94. \def\APLcomment{{\hbox{\wasy\char127}}}
  95. \def\APLinv{{\hbox to 0pt{\tensy\char4\hss}\APLbox}}
  96. \def\APLuparrowbox{{\hbox{\wasy\char110}}}
  97. \def\APLdownarrowbox{{\hbox{\wasy\char111}}}
  98. \def\APLleftarrowbox{{\hbox{\wasy\char112}}}
  99. \def\APLrightarrowbox{{\hbox{\wasy\char113}}}
  100. \def\notbackslash{\overstrike{\backslash}{-}}
  101. \def\notslash{\overstrike{/}{-}}
  102. \def\APLnot#1{\overstrike{\sim}{#1}}
  103. \def\APLcirc#1{\overstrike{\circ}{#1}}
  104. \def\APLvert#1{\overstrike{\vert}{#1}}
  105. \def\APLminus{\raise0.7ex\hbox{$-$}}
  106. %%%%%% diagrams
  107. \def\photon{\hbox{\wasy\char58\char58\char58\char58}}
  108. \def\gluon{\hbox{\wasy\char81\char80\char80\char80%
  109.     \char80\char80\char80\char82}}
  110. %%%%%% math characters
  111. \def\Bowtie{\hbox{\wasy\char49}}
  112. \def\leftturn{\hbox{\wasy\char34}}
  113. \def\rightturn{\hbox{\wasy\char33}}
  114. %%%%%% math operators as mathchars
  115. \def\wasymathchardef#1#2{%
  116.     \count255=\wasyfamcount
  117.     \advance\count255 by#1
  118.     \mathchardef#2\count255}
  119. \wasymathchardef{12332}{\lhd}
  120. \wasymathchardef{12334}{\rhd}
  121. \wasymathchardef{12304}{\LHD}
  122. \wasymathchardef{12305}{\RHD}
  123. \wasymathchardef{12333}{\unlhd}
  124. \wasymathchardef{12335}{\unrhd}
  125. \wasymathchardef{12348}{\sqsubset}
  126. \wasymathchardef{12349}{\sqsupset}
  127. \wasymathchardef{12350}{\apprle}
  128. \wasymathchardef{12351}{\apprge}
  129. \wasymathchardef{12317}{\varpropto}
  130. \wasymathchardef{24}{\invneg}
  131. \wasymathchardef{12347}{\leadsto}
  132. \wasymathchardef{8227}{\ocircle}
  133. \wasymathchardef{12310}{\logof}
  134. \wasymathchardef{4210}{\varint}
  135. \wasymathchardef{4211}{\iint}
  136. \wasymathchardef{4212}{\iiint}
  137. \wasymathchardef{4213}{\varoint}
  138. \wasymathchardef{4214}{\oiint}
  139. %
  140. %%%%%% new definitions
  141. %
  142. \def\newpropto{\let\propto\varpropto}
  143. \def\newint{\let\int\varint \let\oint\varoint} % default limits
  144.